(compilation-start): In the no-async-subprocesses branch, fontify

the buffer explicitly after the process exits.

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 376136e33ae1e0fd88c615f78d92c9334e4f6b5b..da05a7ff8bb0ed89d7562da2b9443f4126906016 100644 (file)
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -959,6 +959,10 @@ exited abnormally with code %d\n"
                                          (concat status "\n")))
                (t
                 (compilation-handle-exit 'bizarre status status))))
+       ;; Without async subprocesses, the buffer is not yet
+       ;; fontified, so fontify it now.
+       (let ((font-lock-verbose nil))  ; shut up font-lock messages
+         (font-lock-fontify-buffer))
        (message "Executing `%s'...done" command)))
     (if (buffer-local-value 'compilation-scroll-output outbuf)
        (save-selected-window